object dlgInterlog: TdlgInterlog
  Left = 200
  Top = 128
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = 'Inter Log'
  ClientHeight = 318
  ClientWidth = 535
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object TabbedNotebook: TTabbedNotebook
    Left = 84
    Top = 4
    Width = 449
    Height = 277
    HelpContext = 10
    TabFont.Color = clBlack
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 0
    TabStop = False
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Output'
      object GroupBox1: TGroupBox
        Left = 300
        Top = 100
        Width = 137
        Height = 141
        HelpContext = 80
        Caption = 'Total price'
        TabOrder = 1
        object Label1: TLabel
          Left = 8
          Top = 20
          Width = 44
          Height = 13
          Caption = 'Dialprice:'
        end
        object Label2: TLabel
          Left = 8
          Top = 58
          Width = 66
          Height = 13
          Caption = 'Minutes price:'
        end
        object Label3: TLabel
          Left = 8
          Top = 97
          Width = 27
          Height = 13
          Caption = 'Total:'
        end
        object eDialPrice: TEdit
          Left = 4
          Top = 35
          Width = 129
          Height = 21
          HelpContext = 80
          TabStop = False
          ReadOnly = True
          TabOrder = 0
        end
        object eMinutesPrice: TEdit
          Left = 4
          Top = 74
          Width = 129
          Height = 21
          HelpContext = 80
          TabStop = False
          ReadOnly = True
          TabOrder = 1
        end
        object eTotal: TEdit
          Left = 4
          Top = 112
          Width = 129
          Height = 21
          HelpContext = 80
          TabStop = False
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ReadOnly = True
          TabOrder = 2
        end
      end
      object Memo: TMemo
        Left = 4
        Top = 8
        Width = 291
        Height = 233
        HelpContext = 80
        TabStop = False
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 2
      end
      object cbExtInfo: TCheckBox
        Left = 300
        Top = 72
        Width = 133
        Height = 17
        HelpContext = 80
        Caption = '&Extended information'
        TabOrder = 0
        OnClick = bReCalcClick
      end
      object bitRecalc: TBitBtn
        Left = 300
        Top = 8
        Width = 137
        Height = 25
        Hint = 'Recalculate'
        HelpContext = 80
        Caption = '&Recalculate'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = bReCalcClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        NumGlyphs = 2
      end
      object bitSave: TBitBtn
        Left = 368
        Top = 32
        Width = 69
        Height = 25
        Hint = 'Save...'
        HelpContext = 80
        Caption = '&Save...'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        OnClick = bitSaveClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
          7700333333337777777733333333008088003333333377F73377333333330088
          88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
          000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
          FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
          99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
          99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
          99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
          93337FFFF7737777733300000033333333337777773333333333}
        NumGlyphs = 2
      end
      object bitFont: TBitBtn
        Left = 300
        Top = 32
        Width = 69
        Height = 25
        Hint = 'Change Font...'
        HelpContext = 80
        Caption = '&Font...'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        OnClick = bFontClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333333FFF33FFFFF33333300033000
          00333337773377777333333330333300033333337FF33777F333333330733300
          0333333377FFF777F33333333700000073333333777777773333333333033000
          3333333337FF777F333333333307300033333333377F777F3333333333703007
          33333333377F7773333333333330000333333333337777F33333333333300003
          33333333337777F3333333333337007333333333337777333333333333330033
          3333333333377333333333333333033333333333333733333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Price Setup'
      object Bevel1: TBevel
        Left = 0
        Top = 211
        Width = 441
        Height = 38
        Align = alBottom
        Shape = bsTopLine
      end
      object GroupBox2: TGroupBox
        Left = 12
        Top = 4
        Width = 205
        Height = 81
        HelpContext = 30
        Caption = 'Dialprices'
        TabOrder = 0
        object Label6: TLabel
          Left = 8
          Top = 28
          Width = 100
          Height = 13
          Caption = 'Price per dial............:'
        end
        object ePricePerDial: TEdit
          Left = 112
          Top = 24
          Width = 85
          Height = 21
          HelpContext = 30
          TabOrder = 0
          Text = '0,125'
        end
      end
      object GroupBox3: TGroupBox
        Left = 224
        Top = 4
        Width = 205
        Height = 81
        HelpContext = 30
        Caption = 'Unit prices'
        TabOrder = 1
        object Label4: TLabel
          Left = 12
          Top = 24
          Width = 95
          Height = 13
          Caption = 'Normal price...........:'
        end
        object Label5: TLabel
          Left = 12
          Top = 48
          Width = 96
          Height = 13
          Caption = 'Cheap hours...........:'
        end
        object eUnitPriceNormal: TEdit
          Left = 112
          Top = 20
          Width = 85
          Height = 21
          HelpContext = 30
          TabOrder = 0
          Text = '0,32'
        end
        object eUnitPriceCheap: TEdit
          Left = 112
          Top = 48
          Width = 85
          Height = 21
          HelpContext = 30
          TabOrder = 1
          Text = '0,16'
        end
      end
      object GroupBox4: TGroupBox
        Left = 224
        Top = 88
        Width = 205
        Height = 113
        HelpContext = 30
        Caption = '*173* Special discount'
        TabOrder = 3
        object Label7: TLabel
          Left = 12
          Top = 28
          Width = 96
          Height = 13
          Caption = 'Start price...............:'
        end
        object Label8: TLabel
          Left = 12
          Top = 56
          Width = 96
          Height = 13
          Caption = 'Unit price................:'
        end
        object Label9: TLabel
          Left = 12
          Top = 84
          Width = 97
          Height = 13
          Caption = 'Effectuated after.....:'
        end
        object Label10: TLabel
          Left = 172
          Top = 84
          Width = 24
          Height = 13
          Caption = 'mins.'
        end
        object e173StartPrice: TEdit
          Left = 112
          Top = 24
          Width = 85
          Height = 21
          HelpContext = 30
          TabOrder = 0
          Text = '1,50'
        end
        object e173UnitPrice: TEdit
          Left = 112
          Top = 52
          Width = 85
          Height = 21
          HelpContext = 30
          TabOrder = 1
          Text = '0,08'
        end
        object eEffectuatedAfter: TEdit
          Left = 112
          Top = 80
          Width = 57
          Height = 21
          HelpContext = 30
          TabOrder = 2
          Text = '30'
        end
      end
      object bPriceSetupCancel: TButton
        Left = 360
        Top = 220
        Width = 73
        Height = 25
        HelpContext = 30
        Caption = '&Cancel'
        TabOrder = 5
        OnClick = bPriceSetupCancelClick
      end
      object bPriceSetupOK: TButton
        Left = 284
        Top = 220
        Width = 73
        Height = 25
        HelpContext = 30
        Caption = '&OK'
        Default = True
        TabOrder = 4
        OnClick = bPriceSetupOKClick
      end
      object GroupBox7: TGroupBox
        Left = 12
        Top = 88
        Width = 205
        Height = 113
        HelpContext = 30
        Caption = 'Times'
        TabOrder = 2
        object Label17: TLabel
          Left = 12
          Top = 20
          Width = 148
          Height = 13
          Caption = 'Cheap time start.......................:'
        end
        object Label18: TLabel
          Left = 12
          Top = 52
          Width = 149
          Height = 13
          Caption = 'Cheap time end........................:'
        end
        object cbSundays: TCheckBox
          Left = 8
          Top = 80
          Width = 189
          Height = 17
          HelpContext = 30
          Alignment = taLeftJustify
          Caption = 'Always cheap time on sundays.......:'
          State = cbChecked
          TabOrder = 2
        end
        object meChpTimeSTart: TMaskEdit
          Left = 164
          Top = 16
          Width = 33
          Height = 21
          HelpContext = 30
          EditMask = '!90:00;1;_'
          MaxLength = 5
          TabOrder = 0
          Text = '  :  '
        end
        object meChpTimeEnd: TMaskEdit
          Left = 164
          Top = 48
          Width = 33
          Height = 21
          HelpContext = 30
          EditMask = '!90:00;1;_'
          MaxLength = 5
          TabOrder = 1
          Text = '  :  '
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Logfile Setup'
      object Bevel2: TBevel
        Left = 0
        Top = 211
        Width = 441
        Height = 38
        Align = alBottom
        Shape = bsTopLine
      end
      object bLogFileSetupOK: TButton
        Left = 284
        Top = 220
        Width = 73
        Height = 25
        HelpContext = 40
        Caption = '&OK'
        Default = True
        TabOrder = 2
        OnClick = bLogFileSetupOKClick
      end
      object bLogFileSetupCancel: TButton
        Left = 360
        Top = 220
        Width = 73
        Height = 25
        HelpContext = 40
        Caption = '&Cancel'
        TabOrder = 3
        OnClick = bLogFileSetupCancelClick
      end
      object GroupBox5: TGroupBox
        Left = 8
        Top = 12
        Width = 421
        Height = 97
        HelpContext = 40
        Caption = 'Files'
        TabOrder = 0
        object Label11: TLabel
          Left = 8
          Top = 20
          Width = 101
          Height = 13
          Caption = 'Windows logfile........:'
        end
        object Label12: TLabel
          Left = 8
          Top = 48
          Width = 102
          Height = 13
          Caption = 'Temporary file...........:'
        end
        object eWinLogFile: TEdit
          Left = 112
          Top = 16
          Width = 277
          Height = 21
          HelpContext = 40
          TabOrder = 0
          Text = 'C:\WINDOWS\modemlog.txt'
        end
        object eTempFile: TEdit
          Left = 112
          Top = 44
          Width = 277
          Height = 21
          HelpContext = 40
          TabOrder = 1
          Text = 'C:\WINDOWS\modemlok.txt'
        end
        object cbReduceSize: TCheckBox
          Left = 112
          Top = 72
          Width = 201
          Height = 17
          HelpContext = 40
          Caption = '&Reduce logfile size'
          State = cbChecked
          TabOrder = 2
        end
        object bBrowseLogfile: TButton
          Left = 392
          Top = 16
          Width = 21
          Height = 21
          HelpContext = 40
          Caption = '...'
          TabOrder = 3
          OnClick = bBrowseLogfileClick
        end
        object bBrowseTempFile: TButton
          Left = 392
          Top = 44
          Width = 21
          Height = 21
          HelpContext = 40
          Caption = '...'
          TabOrder = 4
          OnClick = bBrowseTempFileClick
        end
      end
      object GroupBox6: TGroupBox
        Left = 8
        Top = 112
        Width = 421
        Height = 77
        HelpContext = 40
        Caption = 'Logfile tokens'
        TabOrder = 1
        object Label13: TLabel
          Left = 8
          Top = 20
          Width = 83
          Height = 13
          Caption = 'Dialing................:'
        end
        object Label14: TLabel
          Left = 8
          Top = 48
          Width = 84
          Height = 13
          Caption = 'Connection.........:'
        end
        object Label15: TLabel
          Left = 212
          Top = 20
          Width = 80
          Height = 13
          Caption = 'Hangup.............:'
        end
        object Label16: TLabel
          Left = 212
          Top = 48
          Width = 80
          Height = 13
          Caption = '*173*.................:'
        end
        object eDialing: TEdit
          Left = 96
          Top = 16
          Width = 109
          Height = 21
          HelpContext = 40
          TabOrder = 0
          Text = 'Dialing'
        end
        object eConnection: TEdit
          Left = 96
          Top = 44
          Width = 109
          Height = 21
          HelpContext = 40
          TabOrder = 1
          Text = 'Connection established'
        end
        object eHangup: TEdit
          Left = 296
          Top = 16
          Width = 109
          Height = 21
          HelpContext = 40
          TabOrder = 2
          Text = 'Hanging up the modem.'
        end
        object e173Dialing: TEdit
          Left = 296
          Top = 44
          Width = 109
          Height = 21
          HelpContext = 40
          TabOrder = 3
          Text = 'Send: ATDT*###*(##)######'
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Info'
      object Panel1: TPanel
        Left = 8
        Top = 12
        Width = 425
        Height = 221
        HelpContext = 50
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Label19: TLabel
          Left = 16
          Top = 16
          Width = 179
          Height = 24
          Caption = 'Interlog version 1.1'
          Font.Color = clBlack
          Font.Height = -19
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label20: TLabel
          Left = 16
          Top = 44
          Width = 135
          Height = 13
          Caption = '(c) 1997 Caos Development.'
        end
        object Label21: TLabel
          Left = 16
          Top = 60
          Width = 86
          Height = 13
          Caption = 'All rights reserved.'
        end
        object Label22: TLabel
          Left = 12
          Top = 88
          Width = 257
          Height = 45
          AutoSize = False
          Caption = 
            'This program is Public Domain, and may be distributed freely if ' +
            'distributed in its entirely, and without any changes except for ' +
            'compressing purposes.'
          WordWrap = True
        end
        object Label23: TLabel
          Left = 12
          Top = 136
          Width = 253
          Height = 73
          AutoSize = False
          Caption = 
            'The CAOS InterLog is distributed as-is. The author disclaims all' +
            ' warranties, expressed or implied. The author will assume no lia' +
            'bility for damages either from the direct use of this product or' +
            ' as a consequence of the use of this product.'
          WordWrap = True
        end
        object Myself: TImage
          Left = 272
          Top = 4
          Width = 150
          Height = 214
          Hint = 'Yeps, I did this!'
          AutoSize = True
          ParentShowHint = False
          Picture.Data = {<image000.bmp>}
          ShowHint = True
        end
      end
    end
  end
  object Panel2: TPanel
    Left = 4
    Top = 28
    Width = 77
    Height = 249
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object InterLoglogo: TImage
      Left = 14
      Top = 14
      Width = 46
      Height = 219
      AutoSize = True
      Picture.Data = {<image001.bmp>}
    end
  end
  object bitClose: TBitBtn
    Left = 448
    Top = 288
    Width = 73
    Height = 25
    HelpContext = 10
    Cancel = True
    Caption = '&Close'
    TabOrder = 2
    OnClick = bCloseClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33F333337F3333373B33333BB33333B337FF33377F33337F3BB3333BB333
      3BB3377FF3377F33377333BB777BB777BB333377FFF77FFF7733330000000000
      B3333377777777777333330FFFFFFFF03333337F3FF3FFF7F333330F00F000F0
      33333F7F77377737FFFFBB0FFF8FFFF0BBB3777F3F33FFF7777F3B0F08700000
      000B377F73F7777777773308880FFFFFF033337F377333333733330807FFFFF8
      033333737FFFFFFF7F33333000000000B3333337777777777FF333BB333BB333
      BB33337733377F3377FF3BB3333BB3333BB3377333377F33377F3B33333BB333
      33B33733333773333373B333333B3333333B7333333733333337}
    NumGlyphs = 2
  end
  object FontDialog: TFontDialog
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Options = [fdEffects, fdForceFontExist]
    Left = 4
    Top = 288
  end
  object SaveDialog: TSaveDialog
    DefaultExt = '.TXT'
    FileEditStyle = fsEdit
    Filter = 'Text file (*.TXT)|*.TXT'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofNoReadOnlyReturn]
    Left = 32
    Top = 288
  end
  object OpenDialog: TOpenDialog
    DefaultExt = '*.TXT'
    FileEditStyle = fsEdit
    Filter = 
      'Text files (*.TXT)|*.TXT|All files (*.*)|*.*|Win95 logfile|modem' +
      'log.Txt|Modemlok.txt|modemlok.txt'
    Left = 64
    Top = 288
  end
end